home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacHack 1996
/
MacHack 1996.toast
/
Presentations
/
Presentations ’94
/
Timothy Knox
/
Help
/
Help Files
/
Constraints
/
LaFac
< prev
next >
Wrap
Text File
|
1994-06-24
|
1KB
|
45 lines
;LAFAC+COURS=SAVOIR
(c)
;;; Variables
(r3 s a l c r2 o v r1 f u r0 i r)
;;; Constraints
((=? (+ c s) (+ r (* 10 r0)))
(=? (+ r0 (+ a r)) (+ i (* 10 r1)))
(=? (+ r1 (+ f u)) (+ o (* 10 r2)))
(=? (+ r2 (+ a o)) (+ v (* 10 r3)))
(=? (+ r3 (+ l c)) (+ a (* 10 s)))
(<>? l a) (<>? l f) (<>? l c)
(<>? l o) (<>? l u) (<>? l r)
(<>? l s) (<>? l v) (<>? l i)
(<>? a f) (<>? a c) (<>? a o)
(<>? a u) (<>? a r) (<>? a s)
(<>? a v) (<>? a i) (<>? f c)
(<>? f o) (<>? f u) (<>? f r)
(<>? f s) (<>? f v) (<>? f i)
(<>? c o) (<>? c u) (<>? c r)
(<>? c s) (<>? c v) (<>? c i)
(<>? o u) (<>? o r) (<>? o s)
(<>? o v) (<>? o i) (<>? u r)
(<>? u s) (<>? u v) (<>? u i)
(<>? r s) (<>? r v) (<>? r i)
(<>? s v) (<>? s i) (<>? v i)
(<>? l 0)(<>? c 0)(<>? s 0))
;;; Domains
((0 1)
(1 0)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9))